Public Class OrdenesDeTrabajo
    Dim ADOT As New ADCono.OrdenesDeTrabajo

    Public Function GenerarOT(ByVal Fec, ByVal Can, ByVal Obs)
        Dim DS As DataSet
        DS = ADOT.GenerarOT(Fec, Can, Obs)
        Return DS
    End Function

    Public Function ObtenerOT(ByVal ParamArray Dat() As String)
        Dim DS As DataSet
        DS = ADOT.ObtenerOT(Dat(0))
        Return DS
    End Function

    Public Function ModificarOT(ByVal ParamArray Dat() As String)
        Dim DS As DataSet
        DS = ADOT.ModificarOT(Dat(1), Dat(2), Dat(3), Dat(4))
        Return DS
    End Function

    Public Function GenerarIOT(ByVal CodOT, ByVal CodIPP, ByVal IOT, ByVal Fec, ByVal Obs)
        Dim DS As DataSet
        DS = ADOT.GenerarIOT(CodOT, CodIPP, IOT, Fec, Obs)
        Return DS
    End Function

    Public Function ObtenerIOT(ByVal ParamArray Dat() As String)
        Dim DS As DataSet
        DS = ADOT.ObtenerIOT(Dat(0))
        Return DS
    End Function

    Public Function ModificarIOT(ByVal CodIOT)
        Dim DS As DataSet
        DS = ADOT.ModificarIOT(CodIOT)
        Return DS
    End Function

    Public Function EliminarIOT(ByVal CodIOT)
        Dim DS As New DataSet
        DS = ADOT.EliminarIOT(CodIOT)
        Return DS
    End Function
End Class